home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual dBase Pro v7.0 / DATA1.CAB / Sample_dBASE / Mugs / Invoice.rep < prev    next >
Encoding:
Text File  |  1997-11-20  |  18.1 KB  |  606 lines
  1. //--------------------------------------------------------------
  2. //
  3. //  Invoice.rep - Mugs Sample Application
  4. //
  5. //  The Mugs application uses this report to display 
  6. //  Invoices selected from the IReport.wfm.
  7. //
  8. //  Dependencies: CONNECT.DMD
  9. //                Invoice.dbf
  10. //                Lineitem.dbf
  11. //                Customer.dbf
  12. //                Country.dbf
  13. //                          
  14. //
  15. //  Visual dBASE Samples Group
  16. //
  17. //  $Revision:   1.4  $
  18. //
  19. //  Copyright (c) 1997, Borland International, Inc. 
  20. //  All rights reserved.
  21. //
  22. //---------------------------------------------------------------
  23.  
  24. SET TALK OFF
  25. ** END HEADER -- do not remove this line
  26. //
  27. // Generated on 11/10/97
  28. //
  29. local r
  30. r = new INVOICEReport()
  31. r.render()
  32.  
  33. class INVOICEReport of REPORT
  34.    with (this)
  35.       title = "Invoice"
  36.       scaleFontSize = 8
  37.       scaleFontBold = false
  38.    endwith
  39.  
  40.  
  41.    this.DMCONNECT = new DATAMODREF()
  42.    this.DMCONNECT.parent = this
  43.    with (this.DMCONNECT)
  44.       filename = "connect.dmd"
  45.       dataModClass = "ConnectDataModule"
  46.       share = 0    // None
  47.       active = true
  48.       left = 0
  49.       top = 0
  50.    endwith
  51.  
  52.  
  53.    this.INVOICE1 = new QUERY()
  54.    this.INVOICE1.parent = this
  55.    with (this.INVOICE1)
  56.       left = 500
  57.       top = 0
  58.       database = form.DMCONNECT.ref.dbmugs
  59.       sql = 'SELECT Invoice."Invoice ID", Invoice."Order Date", Invoice."Customer ID", Invoice."Pay Type", Invoice."Card Number", Invoice."Card Exp", Invoice."Card Name", Invoice."Check Number", Customer."Last Name", Customer."First Name", Customer.PHONE, Customer.STREET1, Customer.STREET2, Customer.CITY, Customer."State ID", Customer.POSTAL, Country.COUNTRY, Lineitem."Item ID", Inventory.DESCRIPTION, Lineitem.QTY LINEITEMQTY, Inventory.QTY INVENTORYQTY FROM "invoice.dbf" Invoice INNER JOIN "customer.dbf" Customer ON  (Invoice."Customer ID" = Customer."Customer ID")   INNER JOIN "lineitem.dbf" Lineitem ON  (Invoice."Invoice ID" = Lineitem."Invoice ID")   INNER JOIN "country.dbf" Country ON  (Customer."Country ID" = Country."Country ID")   INNER JOIN "inventory.dbf" Inventory ON  (Lineitem."Item ID" = Inventory."Item ID")     ORDER BY Invoice."Invoice ID"'
  60.       requestLive = false
  61.       active = true
  62.    endwith
  63.  
  64.  
  65.  
  66.  
  67.    this.STREAMSOURCE1 = new STREAMSOURCE(this)
  68.  
  69.  
  70.  
  71.    this.STREAMSOURCE1.GROUP1 = new GROUP(this.STREAMSOURCE1)
  72.    with (this.STREAMSOURCE1.GROUP1)
  73.       groupBy = "Invoice ID"
  74.    endwith
  75.  
  76.  
  77.    with (this.STREAMSOURCE1.GROUP1.headerBand)
  78.       expandable = false
  79.       height = 4000
  80.    endwith
  81.  
  82.  
  83.    this.STREAMSOURCE1.GROUP1.headerBand.LABELINVOICEID = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  84.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELINVOICEID)
  85.       height = 250
  86.       left = 100
  87.       top = 100
  88.       width = 1200
  89.       metric = 1    // Twips
  90.       colorNormal = "maroon"
  91.       fontName = "Times New Roman"
  92.       fontSize = 12
  93.       text = "Invoice #:"
  94.    endwith
  95.  
  96.  
  97.    this.STREAMSOURCE1.GROUP1.headerBand.VALUEINVOICEID = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  98.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUEINVOICEID)
  99.       height = 250
  100.       left = 1300
  101.       top = 100
  102.       width = 1000
  103.       metric = 1    // Twips
  104.       colorNormal = "maroon"
  105.       fontName = "Times New Roman"
  106.       fontSize = 12
  107.       text = {||this.parent.parent.parent.rowset.fields["Invoice ID"].value+""}
  108.    endwith
  109.  
  110.  
  111.    this.STREAMSOURCE1.GROUP1.headerBand.VALUECUSTOMERID = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  112.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUECUSTOMERID)
  113.       height = 250
  114.       left = 1300
  115.       top = 1300
  116.       width = 1000
  117.       metric = 1    // Twips
  118.       variableHeight = true
  119.       colorNormal = "black"
  120.       fontSize = 9
  121.       text = {||this.form.form.invoice1.rowset.fields["Customer ID"].value+""}
  122.    endwith
  123.  
  124.  
  125.    this.STREAMSOURCE1.GROUP1.headerBand.LABELCUSTID = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  126.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELCUSTID)
  127.       height = 250
  128.       left = 400
  129.       top = 1300
  130.       width = 800
  131.       metric = 1    // Twips
  132.       colorNormal = "black"
  133.       fontSize = 9
  134.       text = "ID:"
  135.    endwith
  136.  
  137.  
  138.    this.STREAMSOURCE1.GROUP1.headerBand.BOXCUST = new RECTANGLE(this.STREAMSOURCE1.GROUP1.headerBand)
  139.    with (this.STREAMSOURCE1.GROUP1.headerBand.BOXCUST)
  140.       left = 252
  141.       top = 948
  142.       width = 7000
  143.       height = 1250
  144.       metric = 1    // Twips
  145.       text = "Customer"
  146.       colorNormal = "WindowText/BtnFace"
  147.       fontSize = 9
  148.       fontBold = true
  149.    endwith
  150.  
  151.  
  152.    this.STREAMSOURCE1.GROUP1.headerBand.VALUECUSTNAME = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  153.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUECUSTNAME)
  154.       height = 240
  155.       left = 1300
  156.       top = 1600
  157.       width = 2000
  158.       metric = 1    // Twips
  159.       variableHeight = true
  160.       colorNormal = "black"
  161.       fontSize = 9
  162.       text = {||this.form.form.invoice1.rowset.fields["First Name"].value.rightTrim() + " " + this.form.form.invoice1.rowset.fields["Last Name"].value.rightTrim()}
  163.    endwith
  164.  
  165.  
  166.    this.STREAMSOURCE1.GROUP1.headerBand.LABELNAME = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  167.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELNAME)
  168.       height = 240
  169.       left = 400
  170.       top = 1600
  171.       width = 800
  172.       metric = 1    // Twips
  173.       colorNormal = "black"
  174.       fontSize = 9
  175.       text = "Name:"
  176.    endwith
  177.  
  178.  
  179.    this.STREAMSOURCE1.GROUP1.headerBand.VALUECITYSTATEZIP = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  180.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUECITYSTATEZIP)
  181.       height = 250
  182.       left = 4000
  183.       top = 1900
  184.       width = 2500
  185.       metric = 1    // Twips
  186.       variableHeight = true
  187.       colorNormal = "BtnText"
  188.       fontSize = 9
  189.       text = {||this.form.form.invoice1.rowset.fields["CITY"].value.rightTrim() + ", " + this.form.form.invoice1.rowset.fields["State ID"].value.rightTrim() + " " + this.form.form.invoice1.rowset.fields["POSTAL"].value.rightTrim()}
  190.    endwith
  191.  
  192.  
  193.    this.STREAMSOURCE1.GROUP1.headerBand.VALUESTREET1 = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  194.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUESTREET1)
  195.       height = 250
  196.       left = 4000
  197.       top = 1300
  198.       width = 2000
  199.       metric = 1    // Twips
  200.       variableHeight = true
  201.       colorNormal = "BtnText"
  202.       fontSize = 9
  203.       text = {||this.form.form.invoice1.rowset.fields["STREET1"].value}
  204.    endwith
  205.  
  206.  
  207.    this.STREAMSOURCE1.GROUP1.headerBand.VALUESTREET2 = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  208.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUESTREET2)
  209.       height = 250
  210.       left = 4000
  211.       top = 1600
  212.       width = 2000
  213.       metric = 1    // Twips
  214.       variableHeight = true
  215.       colorNormal = "BtnText"
  216.       fontSize = 9
  217.       text = {||this.form.form.invoice1.rowset.fields["STREET2"].value}
  218.    endwith
  219.  
  220.  
  221.    this.STREAMSOURCE1.GROUP1.headerBand.LABELADDRESS = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  222.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELADDRESS)
  223.       height = 250
  224.       left = 3000
  225.       top = 1300
  226.       width = 800
  227.       metric = 1    // Twips
  228.       colorNormal = "BtnText"
  229.       fontSize = 9
  230.       text = "Address:"
  231.    endwith
  232.  
  233.  
  234.    this.STREAMSOURCE1.GROUP1.headerBand.LABELORDERDATE = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  235.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELORDERDATE)
  236.       height = 240
  237.       left = 100
  238.       top = 500
  239.       width = 1200
  240.       metric = 1    // Twips
  241.       colorNormal = "maroon"
  242.       fontName = "Times New Roman"
  243.       fontSize = 12
  244.       text = "Order Date:"
  245.    endwith
  246.  
  247.  
  248.    this.STREAMSOURCE1.GROUP1.headerBand.VALUEORDERDATE = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  249.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUEORDERDATE)
  250.       height = 240
  251.       left = 1300
  252.       top = 500
  253.       width = 1008
  254.       metric = 1    // Twips
  255.       variableHeight = true
  256.       colorNormal = "maroon"
  257.       fontName = "Times New Roman"
  258.       fontSize = 12
  259.       text = {||this.form.form.invoice1.rowset.fields["Order Date"].value}
  260.    endwith
  261.  
  262.  
  263.    this.STREAMSOURCE1.GROUP1.headerBand.VALUEPAYNUMBER = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  264.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUEPAYNUMBER)
  265.       height = 250
  266.       left = 1650
  267.       top = 2800
  268.       width = 2100
  269.       metric = 1    // Twips
  270.       variableHeight = true
  271.       colorNormal = "BtnText"
  272.       fontSize = 9
  273.       text = {;sNum = "";if ( this.form.form.invoice1.rowset.fields["Pay Type"].value=="CH" );sNum := this.form.form.invoice1.rowset.fields["Check Number"].value + "";else;sNum := this.form.form.invoice1.rowset.fields["Card Number"].value + "";endif;return (sNum);}
  274.    endwith
  275.  
  276.  
  277.    this.STREAMSOURCE1.GROUP1.headerBand.VALUECARDNAME = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  278.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUECARDNAME)
  279.       canRender = {||this.form.form.invoice1.rowset.fields["Pay Type"].value<>"CH"}
  280.       height = 250
  281.       left = 1674
  282.       top = 3100
  283.       width = 3276
  284.       metric = 1    // Twips
  285.       variableHeight = true
  286.       colorNormal = "BtnText"
  287.       fontSize = 9
  288.       text = {||this.form.form.invoice1.rowset.fields["Card Name"].value}
  289.    endwith
  290.  
  291.  
  292.    this.STREAMSOURCE1.GROUP1.headerBand.VALUECARDEXP = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  293.    with (this.STREAMSOURCE1.GROUP1.headerBand.VALUECARDEXP)
  294.       canRender = {||this.form.form.invoice1.rowset.fields["Pay Type"].value<>"CH"}
  295.       height = 240
  296.       left = 5500
  297.       top = 2800
  298.       width = 1008
  299.       metric = 1    // Twips
  300.       variableHeight = true
  301.       colorNormal = "BtnText"
  302.       fontSize = 9
  303.       text = {||this.form.form.invoice1.rowset.fields["Card Exp"].value}
  304.    endwith
  305.  
  306.  
  307.    this.STREAMSOURCE1.GROUP1.headerBand.LABELCARDNAME = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  308.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELCARDNAME)
  309.       canRender = {||this.form.form.invoice1.rowset.fields["Pay Type"].value<>"CH"}
  310.       height = 250
  311.       left = 400
  312.       top = 3100
  313.       width = 1200
  314.       metric = 1    // Twips
  315.       colorNormal = "BtnText"
  316.       fontSize = 9
  317.       text = "Name on card:"
  318.    endwith
  319.  
  320.  
  321.    this.STREAMSOURCE1.GROUP1.headerBand.LABELPAYNUMBER = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  322.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELPAYNUMBER)
  323.       height = 250
  324.       left = 412
  325.       top = 2800
  326.       width = 1200
  327.       metric = 1    // Twips
  328.       colorNormal = "BtnText"
  329.       fontSize = 9
  330.       text = {;sLabel = "";if ( this.form.form.invoice1.rowset.fields["Pay Type"].value=="CH" );sLabel := "Check number: ";else;sLabel := "Card number: ";endif;return (sLabel)}
  331.    endwith
  332.  
  333.  
  334.    this.STREAMSOURCE1.GROUP1.headerBand.TEXT1 = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  335.    with (this.STREAMSOURCE1.GROUP1.headerBand.TEXT1)
  336.       height = 240
  337.       left = 9888
  338.       top = 2784
  339.       width = 1008
  340.       metric = 1    // Twips
  341.       colorNormal = "BtnText"
  342.       text = "Text1"
  343.    endwith
  344.  
  345.  
  346.    this.STREAMSOURCE1.GROUP1.headerBand.LABELCARDEXP = new TEXT(this.STREAMSOURCE1.GROUP1.headerBand)
  347.    with (this.STREAMSOURCE1.GROUP1.headerBand.LABELCARDEXP)
  348.       canRender = {||this.form.form.invoice1.rowset.fields["Pay Type"].value<>"CH"}
  349.       height = 240
  350.       left = 3864
  351.       top = 2800
  352.       width = 1250
  353.       metric = 1    // Twips
  354.       colorNormal = "BtnText"
  355.       fontSize = 9
  356.       text = "Expiration Date:"
  357.    endwith
  358.  
  359.  
  360.    this.STREAMSOURCE1.GROUP1.headerBand.BOXPAY = new RECTANGLE(this.STREAMSOURCE1.GROUP1.headerBand)
  361.    with (this.STREAMSOURCE1.GROUP1.headerBand.BOXPAY)
  362.       left = 252
  363.       top = 2508
  364.       width = 7000
  365.       height = 960
  366.       metric = 1    // Twips
  367.       text = "Payment"
  368.       colorNormal = "WindowText/BtnFace"
  369.       fontSize = 9
  370.       fontBold = true
  371.    endwith
  372.  
  373.  
  374.    with (this.STREAMSOURCE1.GROUP1.footerBand)
  375.       expandable = false
  376.       height = 1000
  377.    endwith
  378.  
  379.  
  380.    this.STREAMSOURCE1.GROUP1.footerBand.LABELTOTALQTY = new TEXT(this.STREAMSOURCE1.GROUP1.footerBand)
  381.    with (this.STREAMSOURCE1.GROUP1.footerBand.LABELTOTALQTY)
  382.       height = 250
  383.       left = 2300
  384.       top = 200
  385.       width = 2500
  386.       metric = 1    // Twips
  387.       colorNormal = "BLACK"
  388.       fontSize = 9
  389.       text = "Total Mugs At $10.00 Each:"
  390.    endwith
  391.  
  392.  
  393.    this.STREAMSOURCE1.GROUP1.footerBand.VALUETOTALQTY = new TEXT(this.STREAMSOURCE1.GROUP1.footerBand)
  394.    with (this.STREAMSOURCE1.GROUP1.footerBand.VALUETOTALQTY)
  395.       height = 240
  396.       left = 5000
  397.       top = 200
  398.       width = 1000
  399.       metric = 1    // Twips
  400.       variableHeight = true
  401.       colorNormal = "BLACK"
  402.       alignHorizontal = 2    // Right
  403.       picture = "999"
  404.       text = {||this.parent.parent.agSum({||this.parent.rowset.fields["LINEITEMQTY"].value})}
  405.    endwith
  406.  
  407.  
  408.    this.STREAMSOURCE1.GROUP1.footerBand.LINE1 = new LINE(this.STREAMSOURCE1.GROUP1.footerBand)
  409.    with (this.STREAMSOURCE1.GROUP1.footerBand.LINE1)
  410.       left = 5500
  411.       right = 6100
  412.       top = 100
  413.       bottom = 100
  414.       width = 1
  415.       metric = 1    // Twips
  416.       colorNormal = "WindowText"
  417.    endwith
  418.  
  419.  
  420.    this.STREAMSOURCE1.GROUP1.footerBand.LABELDOLLARS = new TEXT(this.STREAMSOURCE1.GROUP1.footerBand)
  421.    with (this.STREAMSOURCE1.GROUP1.footerBand.LABELDOLLARS)
  422.       height = 250
  423.       left = 2300
  424.       top = 500
  425.       width = 2000
  426.       metric = 1    // Twips
  427.       colorNormal = "BtnText"
  428.       fontSize = 9
  429.       fontBold = true
  430.       text = "Invoice Total:"
  431.    endwith
  432.  
  433.  
  434.    this.STREAMSOURCE1.GROUP1.footerBand.TEXT2 = new TEXT(this.STREAMSOURCE1.GROUP1.footerBand)
  435.    with (this.STREAMSOURCE1.GROUP1.footerBand.TEXT2)
  436.       height = 255
  437.       left = 5000
  438.       top = 500
  439.       width = 1000
  440.       metric = 1    // Twips
  441.       colorNormal = "BtnText"
  442.       alignHorizontal = 2    // Right
  443.       fontSize = 9
  444.       fontBold = true
  445.       text = {||"$ " + this.parent.parent.agSum({||this.parent.rowset.fields["LINEITEMQTY"].value}) * 10}
  446.    endwith
  447.  
  448.  
  449.  
  450.  
  451.  
  452.    this.STREAMSOURCE1.detailBand.TITLEITEMID = new TEXT(this.STREAMSOURCE1.detailBand)
  453.    with (this.STREAMSOURCE1.detailBand.TITLEITEMID)
  454.       canRender = {||this.parent.firstOnFrame}
  455.       height = 300
  456.       left = 1000
  457.       top = 0
  458.       width = 1000
  459.       metric = 1    // Twips
  460.       colorNormal = "BtnText"
  461.       suppressIfBlank = true
  462.       fontSize = 9
  463.       fontBold = true
  464.       fontUnderline = true
  465.       text = "Item ID"
  466.    endwith
  467.  
  468.  
  469.    this.STREAMSOURCE1.detailBand.TEXTITEMID1 = new TEXT(this.STREAMSOURCE1.detailBand)
  470.    with (this.STREAMSOURCE1.detailBand.TEXTITEMID1)
  471.       height = 1
  472.       left = 1000
  473.       top = 300
  474.       width = 1000
  475.       metric = 1    // Twips
  476.       variableHeight = true
  477.       colorNormal = "BtnText"
  478.       fontSize = 9
  479.       text = {||this.form.invoice1.rowset.fields["Item ID"].value}
  480.    endwith
  481.  
  482.  
  483.    this.STREAMSOURCE1.detailBand.TITLEDESCRIPTION = new TEXT(this.STREAMSOURCE1.detailBand)
  484.    with (this.STREAMSOURCE1.detailBand.TITLEDESCRIPTION)
  485.       canRender = {||this.parent.firstOnFrame}
  486.       height = 300
  487.       left = 2300
  488.       top = 0
  489.       width = 2500
  490.       metric = 1    // Twips
  491.       colorNormal = "BtnText"
  492.       suppressIfBlank = true
  493.       fontSize = 9
  494.       fontBold = true
  495.       fontUnderline = true
  496.       text = "Description"
  497.    endwith
  498.  
  499.  
  500.    this.STREAMSOURCE1.detailBand.TEXTDESCRIPTION1 = new TEXT(this.STREAMSOURCE1.detailBand)
  501.    with (this.STREAMSOURCE1.detailBand.TEXTDESCRIPTION1)
  502.       height = 1
  503.       left = 2300
  504.       top = 300
  505.       width = 2500
  506.       metric = 1    // Twips
  507.       variableHeight = true
  508.       colorNormal = "BtnText"
  509.       fontSize = 9
  510.       text = {||this.form.invoice1.rowset.fields["DESCRIPTION"].value}
  511.    endwith
  512.  
  513.  
  514.    this.STREAMSOURCE1.detailBand.TITLEQTY = new TEXT(this.STREAMSOURCE1.detailBand)
  515.    with (this.STREAMSOURCE1.detailBand.TITLEQTY)
  516.       canRender = {||this.parent.firstOnFrame}
  517.       height = 300
  518.       left = 5001
  519.       top = 0
  520.       width = 1000
  521.       metric = 1    // Twips
  522.       colorNormal = "BtnText"
  523.       alignHorizontal = 2    // Right
  524.       suppressIfBlank = true
  525.       fontSize = 9
  526.       fontBold = true
  527.       fontUnderline = true
  528.       text = "Qty"
  529.    endwith
  530.  
  531.  
  532.    this.STREAMSOURCE1.detailBand.VALUELINEQTY = new TEXT(this.STREAMSOURCE1.detailBand)
  533.    with (this.STREAMSOURCE1.detailBand.VALUELINEQTY)
  534.       height = 1
  535.       left = 5001
  536.       top = 300
  537.       width = 1000
  538.       metric = 1    // Twips
  539.       variableHeight = true
  540.       colorNormal = "BtnText"
  541.       alignHorizontal = 2    // Right
  542.       picture = "999"
  543.       fontSize = 9
  544.       text = {||this.form.invoice1.rowset.fields["LINEITEMQTY"].value}
  545.    endwith
  546.  
  547.  
  548.    this.PAGETEMPLATE1 = new PAGETEMPLATE(this)
  549.    with (this.PAGETEMPLATE1)
  550.       height = 15840
  551.       width = 12240
  552.       marginTop = 1080
  553.       marginLeft = 1080
  554.       marginBottom = 1080
  555.       marginRight = 1080
  556.       gridLineWidth = 0
  557.    endwith
  558.  
  559.  
  560.    this.PAGETEMPLATE1.STREAMFRAME1 = new STREAMFRAME(this.PAGETEMPLATE1)
  561.    with (this.PAGETEMPLATE1.STREAMFRAME1)
  562.       height = 11592
  563.       left = 100
  564.       top = 1000
  565.       width = 9360
  566.       metric = 1    // Twips
  567.       form.STREAMFRAME1 = form.pagetemplate1.streamframe1
  568.    endwith
  569.  
  570.  
  571.    this.PAGETEMPLATE1.TEXT3 = new TEXT(this.PAGETEMPLATE1)
  572.    with (this.PAGETEMPLATE1.TEXT3)
  573.       height = 588
  574.       left = 205
  575.       top = 205
  576.       width = 7344
  577.       metric = 1    // Twips
  578.       colorNormal = "maroon"
  579.       alignVertical = 1    // Middle
  580.       alignHorizontal = 1    // Center
  581.       fontName = "Times New Roman"
  582.       fontSize = 18
  583.       text = "House of Mugs Invoice Statement"
  584.       form.TEXT3 = form.pagetemplate1.text3
  585.    endwith
  586.  
  587.  
  588.    with (this.printer)
  589.       duplex = 1    // None
  590.       orientation = 1    // Portrait
  591.       paperSource = 15
  592.       paperSize = 1
  593.       resolution = 4    // High
  594.       color = 2    // Color
  595.       trueTypeFonts = 2    // Download
  596.    endwith
  597.  
  598.  
  599.  
  600.  
  601.    this.firstPageTemplate = this.form.pagetemplate1
  602.    this.form.pagetemplate1.nextPageTemplate = this.form.pagetemplate1
  603.    this.form.pagetemplate1.streamframe1.streamSource = this.form.STREAMSOURCE1
  604.    this.form.STREAMSOURCE1.rowset = this.form.invoice1.rowset
  605. endclass
  606.